home *** CD-ROM | disk | FTP | other *** search
/ Practical Internet 2003 March / Practical Internet Issue 78.iso / pc / PracticalInternet.exe / scripts / DefineSprite_16 / frame_7 / DoAction.as
Encoding:
Text File  |  2003-02-06  |  704 b   |  18 lines
  1. trace(eval("../:fish"));
  2. if("1" < eval("../:fish"))
  3. {
  4.    set("../:count","1");
  5.    set("../:fisher",eval("../:fish"));
  6.    while(eval("../:count") < eval("../:softNUM"))
  7.    {
  8.       set("../dup" add eval("../:count") add ":n",eval("../:soft" add (eval("../:fisher") - "1")));
  9.       set("../dup" add eval("../:count") add ":link",eval("../:soft" add (eval("../:fisher") - "1") add "link"));
  10.       set("../dup" add eval("../:count") add ":desc",eval("../:soft" add (eval("../:fisher") - "1") add "desc"));
  11.       set("../:count",eval("../:count") + "1");
  12.       set("../:fisher",eval("../:fisher") + "1");
  13.    }
  14.    set("../:fish",eval("../:fish") - "1");
  15. }
  16. set("../:count","1");
  17. gotoAndPlay(2);
  18.